home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / basic / dialogic.zip / DIALOG8.DB < prev    next >
Text File  |  1990-01-31  |  3KB  |  89 lines
  1. DB(Level%, 1).Code = 1
  2. DB(Level%, 1).Y = 0
  3. DB(Level%, 1).X = 0
  4. DB(Level%, 1).Height = 17
  5. DB(Level%, 1).Wdth = 65
  6. DB(Level%, 1).Bordertype = 1
  7. DB(Level%, 1).PrimaryColor = -c1
  8. DB(Level%, 1).WindowColor = -c1
  9. DB(Level%, 1).Text = "The Command Button"
  10. DB(Level%, 1).TextColor = c2
  11. DB(Level%, 1).SecondaryColor = c1
  12.  
  13. LB(1).Text = "The command button is 'pushed' in order to execute the"
  14. LB(2).Text = "command specified.  Usual command buttons are <OK> and"
  15. LB(3).Text = "<Cancel>.  A highlighted command button may be pushed by"
  16. LB(4).Text = "pressing <Enter>, or may be clicked on using the mouse."
  17. LB(5).Text = "They may have a highlighted letter in them which,  like"
  18. LB(6).Text = "the smart label, allows direct access to them. "
  19. LB(7).Text = " "
  20. LB(8).Text = "Also, we've been pointing out highlighted Alt-keys to you."
  21. LB(9).Text = "When designing dialog boxes it is good practice to pro-"
  22. LB(10).Text = "vide enough Alt-keys so that the user may comfortably jump "
  23. LB(11).Text = "from one dialog box element to another using the keyboard."
  24. LB(12).Text = ""
  25. LB(13).Text = "When you tab from one dialog box element to another you"
  26. LB(14).Text = "are moving what is called the 'input focus'.  If the in-"
  27. LB(15).Text = "put focus is on a command button then its angle brackets"
  28. LB(16).Text = "will be highlighted.  If the input focus falls on any"
  29. LB(17).Text = "other type of dialog box element then a default command"
  30. LB(18).Text = "button will be automatically highlighted.  Every dialog"
  31. LB(19).Text = "box should have a default command button. "
  32. LB(20).Text = " "
  33. LB(21).Text = "If <Enter> is pressed to close a dialog box then the"
  34. LB(22).Text = "highlighted command button will take effect.  A high-"
  35. LB(23).Text = "lighted command button is also said to be 'active'."
  36. LB(24).Text = ""
  37. LB(25).Text = "There are two command buttons below:  <OK> and <Help>.  If"
  38. LB(26).Text = "<OK> is pushed then the next screen will appear.  Push-"
  39. LB(27).Text = "ing <Help> will give you a very special help message to"
  40. LB(28).Text = "illustrate that opening an overlaying dialog box is one"
  41. LB(29).Text = "response to a command button."
  42.  
  43. DB(Level%, 2).Code = 3
  44. DB(Level%, 2).Y = 2
  45. DB(Level%, 2).X = 2
  46. DB(Level%, 2).Height = 10
  47. DB(Level%, 2).Wdth = 1
  48. DB(Level%, 2).WindowColor = c1
  49. DB(Level%, 2).PrimaryColor = c1
  50. DB(Level%, 2).SecondaryColor = c2
  51. DB(Level%, 2).SelectedColor = -1
  52. DB(Level%, 2).StarColor = c1
  53. DB(Level%, 2).ItemLength = 60
  54. DB(Level%, 2).KeyColor = 0
  55. DB(Level%, 2).Bordertype = 2
  56. DB(Level%, 2).Link = 0
  57. DB(Level%, 2).TextY = 0
  58. DB(Level%, 2).TextX = 0
  59. DB(Level%, 2).TextColor = c1
  60. DB(Level%, 2).NumberOne = 1
  61. DB(Level%, 2).NumberTwo = 29
  62. DB(Level%, 2).Default = 0
  63.  
  64. DB(Level%, 3).Code = 7
  65. DB(Level%, 3).Y = 16
  66. DB(Level%, 3).X = 25
  67. DB(Level%, 3).Text = "~OK"
  68. DB(Level%, 3).PrimaryColor = c1
  69. DB(Level%, 3).WindowColor = c1
  70. DB(Level%, 3).SelectedColor = c3
  71. DB(Level%, 3).KeyColor = c4
  72. DB(Level%, 3).SecondaryColor = c4
  73. DB(Level%, 3).Default = -1
  74. DB(Level%, 3).TextString = CHR$(13)
  75.  
  76. DB(Level%, 4).Code = 7
  77. DB(Level%, 4).Y = 16
  78. DB(Level%, 4).X = 35
  79. DB(Level%, 4).Text = "~Help"
  80. DB(Level%, 4).PrimaryColor = c1
  81. DB(Level%, 4).WindowColor = c1
  82. DB(Level%, 4).SelectedColor = c3
  83. DB(Level%, 4).KeyColor = c4
  84. DB(Level%, 4).SecondaryColor = c4
  85. DB(Level%, 4).Default = 0
  86. DB(Level%, 4).TextString = CHR$(0) + CHR$(59)
  87.  
  88. DB(Level%, 5).Code = 0
  89.